home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple Software Dispatch
/
Apple Software Dispatch.iso
/
Software Dispatch Files
/
Spectre
/
Sample Application
/
Sample Application.rsrc
/
CODE_26.txt
< prev
next >
Wrap
Text File
|
1991-07-31
|
7KB
|
121 lines
# near model CODE resource
# jump table entries: 2480-2481 (2 of them)
export_310:
00000000 4E56 0000 link A6, 0
00000004 2B7C 005B 0054 D9FE move.l [A5 - 0x2602], 0x5B0054 /* '[\0T' */
0000000C 2B7C 0057 0056 DA02 move.l [A5 - 0x25FE], 0x570056 /* 'W\0V' */
00000014 2B7C 0058 0059 DA06 move.l [A5 - 0x25FA], 0x580059 /* 'X\0Y' */
0000001C 2B7C 005C 0053 DA0A move.l [A5 - 0x25F6], 0x5C0053 /* '\\\0S' */
00000024 2B7C 0055 0031 DA0E move.l [A5 - 0x25F2], 0x550031 /* 'U\01' */
0000002C 2B7C 0011 0009 DA12 move.l [A5 - 0x25EE], 0x110009
00000034 2B7C 0005 0003 DA16 move.l [A5 - 0x25EA], 0x50003
0000003C 2B7C 0004 000F DA1A move.l [A5 - 0x25E6], 0x4000F
00000044 2B7C 0010 0008 DA1E move.l [A5 - 0x25E2], 0x100008
0000004C 3B7C 000B DA22 move.w [A5 - 0x25DE], 0xB
00000052 486D DA24 pea.l [A5 - 0x25DC]
00000056 A972 syscall GetMouse
00000058 302D B2B4 move.w D0, [A5 - 0x4D4C]
0000005C 906D B2B0 sub.w D0, [A5 - 0x4D50]
00000060 48C0 ext.l D0
00000062 81FC 0003 divs.w D0, 0x3
00000066 3B40 DA28 move.w [A5 - 0x25D8], D0
0000006A 302D B2B4 move.w D0, [A5 - 0x4D4C]
0000006E 906D B2B0 sub.w D0, [A5 - 0x4D50]
00000072 48C0 ext.l D0
00000074 81FC 0003 divs.w D0, 0x3
00000078 3B40 DA2A move.w [A5 - 0x25D6], D0
0000007C 4E5E unlink A6
0000007E 4E75 rts
fn00000080:
00000080 4E56 FEFE link A6, -0x0102
00000084 48E7 0108 movem.l -[A7], D7,A4
00000088 206E 000C movea.l A0, [A6 + 0xC]
0000008C 302D D7CE move.w D0, [A5 - 0x2832]
00000090 C1FC 0026 muls.w D0, 0x26 /* '&' */
00000094 49F0 00EE lea.l A4, [A0 + D0.w - 0x18]
00000098 486E FEFE pea.l [A6 - 0x102]
0000009C 4EAD 077A jsr [A5 + 0x77A /* export_235 */]
000000A0 205F movea.l A0, [A7]+
000000A2 224C movea.l A1, A4
000000A4 22D8 move.l [A1]+, [A0]+
000000A6 22D8 move.l [A1]+, [A0]+
000000A8 22D8 move.l [A1]+, [A0]+
000000AA 22D8 move.l [A1]+, [A0]+
000000AC 4240 clr.w D0
000000AE 102C 0001 move.b D0, [A4 + 0x1]
000000B2 3940 001A move.w [A4 + 0x1A], D0
000000B6 426C 001C clr.w [A4 + 0x1C]
000000BA 422C 001E clr.b [A4 + 0x1E]
000000BE 102E 000A move.b D0, [A6 + 0xA]
000000C2 6702 beq +0x4 /* 000000C6 */
000000C4 607C bra +0x7E /* 00000142 */
label000000C6:
000000C6 7E01 moveq.l D7, 0x01
000000C8 6036 bra +0x38 /* 00000100 */
label000000CA:
000000CA BE6D D7CE cmp.w D7, [A5 - 0x2832]
000000CE 6602 bne +0x4 /* 000000D2 */
000000D0 602C bra +0x2E /* 000000FE */
label000000D2:
000000D2 206E 000C movea.l A0, [A6 + 0xC]
000000D6 3007 move.w D0, D7
000000D8 C1FC 0026 muls.w D0, 0x26 /* '&' */
000000DC 49F0 00EE lea.l A4, [A0 + D0.w - 0x18]
000000E0 422C 001F clr.b [A4 + 0x1F]
000000E4 4214 clr.b [A4]
000000E6 397C 004E 001A move.w [A4 + 0x1A], 0x4E /* 'N' */
000000EC 3007 move.w D0, D7
000000EE 48C0 ext.l D0
000000F0 81FC 0002 divs.w D0, 0x2
000000F4 4840 swap.w D0
000000F6 3940 001C move.w [A4 + 0x1C], D0
000000FA 422C 001E clr.b [A4 + 0x1E]
label000000FE:
000000FE 5247 addq.w D7, 1
label00000100:
00000100 7006 moveq.l D0, 0x06
00000102 B047 cmp.w D0, D7
00000104 6CC4 bge -0x3A /* 000000CA */
00000106 286E 000C movea.l A4, [A6 + 0xC]
0000010A 102E 0008 move.b D0, [A6 + 0x8]
0000010E 6704 beq +0x6 /* 00000114 */
00000110 4214 clr.b [A4]
00000112 6004 bra +0x6 /* 00000118 */
label00000114:
00000114 18BC 0001 move.b [A4], 0x1
label00000118:
00000118 397C 0003 000C move.w [A4 + 0xC], 0x3
0000011E 197C 0001 000A move.b [A4 + 0xA], 0x1
00000124 397C 0001 0008 move.w [A4 + 0x8], 0x1
0000012A 197C 0001 0001 move.b [A4 + 0x1], 0x1
00000130 700A moveq.l D0, 0x0A
00000132 2940 0002 move.l [A4 + 0x2], D0
00000136 397C 000F 0006 move.w [A4 + 0x6], 0xF
0000013C 397C 0001 0012 move.w [A4 + 0x12], 0x1
label00000142:
00000142 4CDF 1080 movem.l D7,A4, [A7]+
00000146 4E5E unlink A6
00000148 205F movea.l A0, [A7]+
0000014A 504F addq.w A7, 8
0000014C 4ED0 jmp [A0]
export_311:
0000014E 4E56 FFD4 link A6, -0x002C
00000152 422E 0010 clr.b [A6 + 0x10]
00000156 102E 000A move.b D0, [A6 + 0xA]
0000015A 6702 beq +0x4 /* 0000015E */
0000015C 6024 bra +0x26 /* 00000182 */
label0000015E:
0000015E 3B7C 0001 D7CE move.w [A5 - 0x2832], 0x1
00000164 422E FFDA clr.b [A6 - 0x26]
00000168 1B7C 0001 D7D1 move.b [A5 - 0x282F], 0x1
0000016E 2F2E 000C move.l -[A7], [A6 + 0xC]
00000172 1F2E 000A move.b -[A7], [A6 + 0xA]
00000176 1F2E 0008 move.b -[A7], [A6 + 0x8]
0000017A 4EBA FF04 jsr [PC - 0xFC /* 00000080 */]
0000017E 102E 0008 move.b D0, [A6 + 0x8]
label00000182:
00000182 4E5E unlink A6
00000184 205F movea.l A0, [A7]+
00000186 504F addq.w A7, 8
00000188 4ED0 jmp [A0]